Notes

Disk info for Pixit_1983_Baudville.do:

File Name: a2_Pixit_1983_Baudville/Pixit_1983_Baudville.do

Disk Name: DISK VOLUME #254

Physical Size (bytes): 143360

Free Space (bytes): 33024

Used Space (bytes): 110336

Physical Size (KB): 140

Free Space (KB): 32

Used Space (KB): 107

Archive Order: DOS

Disk Format: DOS 3.3

Total Sectors: 560

Free Sectors: 129

Used Sectors: 431

Tracks On Disk: 35

Sectors On Disk: 16

Disk directory for Pixit_1983_Baudville.do:

a2_Pixit_1983_Baudville/Pixit_1983_Baudville.do DISK VOLUME #254

* A 016 MENU

* A 000 START

* A 027 PICTURE EDITOR

* A 025 CREATE-A-SHAPE

* A 016 SHAPE TABLE EDITOR

* A 000 DEMO1

* B 009 MC1

* B 007 MC2

* B 009 MC3

* B 009 MC4

B 003 MC5

* B 008 CS.STANDARD 8

* B 008 CS.BOLD 10

* B 017 CS.BOLD 17

* B 008 CS.ITALIC 8

* B 014 CS.LARGE BLOCK 17

* B 008 ST.TUTORIAL SHAPES

* B 015 ST.ANIMALS 1

* B 006 ST.GEOMETRICS

* B 008 ST.PAINTS & PATTERNS

* B 012 ST.TREES

* B 002 ST.ANIMATION SHAPES

* B 014 ST.WILD ANIMALS

* B 009 ST.BUILDINGS

* B 005 ST.GAME SHAPES

* B 004 ST.MUSIC SYMBOLS

* B 010 ST.MUSIC INSTRUMENTS

* B 013 ST.POTPOURRI

* B 033 PI.CABLE CAR

* A 003 ANIMATION EXAMPLE 1

* A 003 ANIMATION EXAMPLE 2

* A 004 PIXIT SLIDESHOW

* A 000 PC

* B 000 PCM

* A 003 HI-RES TYPEWRITER

B 002 ST.TEST

DOS 3.3 format; 33,024 bytes free; 110,336 bytes used.

Text found in Pixit_1983_Baudville.do/MENU.bas:

0 REM PIXIT MENU PROGRAM(C)1894 BAUDVILLE

1 ONERR GOTO 600

5 POKE 230,32: CALL 62450: IF PEEK(770) < >132 OR PEEK(772) < >186 THEN PRINT CHR$(4)"BLOADMC5"

7 POKE 40282,101: POKE 40283,216: POKE -16297,0: POKE -16300,0: POKE -16302,0

10 D$ = "":M = 1:XM = 105:YM = 81:X = 0:Y = 90: HCOLOR= 7:PM = 13:PT = 13: POKE 232,0: POKE 233,PM: SCALE= 1: ROT= 0

20 POKE -16368,0: GOTO 50

30 POKE 233,PT: HCOLOR= 0: HPLOT X,Y: FOR N = 1 TO LEN(T$): XDRAW ASC( MID$ (T$,N,1)) -31: NEXT : RETURN

50 XDRAW 3 AT 26,91: XDRAW 4 AT 54,76: XDRAW 5 AT 68,67: XDRAW 6 AT 96,55: XDRAW 7 AT 110,44: HPLOT 95,80 TO 255,80 TO 255,124 TO 95,124 TO 95,80: XDRAW 2 AT 157,160

60 X = XM:Y = 75:T$ = "PROGRAM MENU": GOSUB 30

61 Y = 90:T$ = "Picture Editor": GOSUB 30

62 Y = 100:T$ = "Create a Shape": GOSUB 30

63 Y = 110:T$ = "Shape Table Editor": GOSUB 30

65 Y = 120:T$ = "Quit": GOSUB 30

66 X = 106:Y = 135:T$ = " to select": GOSUB 30

90 POKE -16304,0

100 POKE 233,PM:X = XM

110 Y = YM +10 *M: XDRAW 8 AT X,Y

120 CALL -756:KB = PEEK( -16384): IF KB = 8 OR KB = 11 THEN 160

130 IF KB = 21 OR KB = 10 THEN 180

140 IF KB < >13 THEN 120

150 HOME : VTAB 10: ON M GOTO 200,300,400,600

160 XDRAW 8 AT X,Y:M = M -1: IF M = 0 THEN M = 4

170 GOTO 110

180 XDRAW 8 AT X,Y:M = M +1: IF M = 5 THEN M = 1

190 GOTO 110

200 POKE -16303,0: HTAB 10: PRINT "LOADING PICTURE EDITOR": PRINT D$"RUN PICTURE EDITOR"

300 POKE -16303,0: HTAB 10: PRINT "LOADING CREATE-A-SHAPE": PRINT D$"RUN CREATE-A-SHAPE"

400 POKE -16303,0: HTAB 8: PRINT "LOADING SHAPE TABLE EDITOR": PRINT D$"RUN SHAPE TABLE EDITOR"

600 TEXT : HOME : POKE 42718,14: POKE 43583,0: POKE 216,0: NEW